(choices "32 Colour Newicons" "4 Colour Standard Icons")
(help "The installer is asking which icon set you would like installed. For the 256 colour icons you must be running NewIcons, otherwise choose the 4 colour icons.")
(default 1)
)
)
(copynicons1)
(copyicons1)
)
)
(procedure chooseicons2
(if
(= 0
(askchoice
(prompt "Please choose your icon set")
(choices "32 Colour Newicons" "4 Colour Standard Icons")
(help "The installer is asking which icon set you would like installed. For the 256 colour icons you must be running NewIcons, otherwise choose the 4 colour icons.")
(default 1)
)
)
(copynicons2)
(copyicons2)
)
)
(procedure copynicons1
(copyfiles
(source "icons/WBReboot_NI.info")
(newname "WBReboot1.0.info")
(dest "SYS:WBStartup")
)
)
(procedure copyicons1
(copyfiles
(source "icons/WBReboot_4col.info")
(newname "WBReboot1.0.info")
(dest "SYS:WBStartup")
)
)
(procedure copynicons2
(copyfiles
(source "icons/WBReboot_NI.info")
(newname "WBReboot1.0c.info")
(dest "SYS:WBStartup")
)
)
(procedure copyicons2
(copyfiles
(source "icons/WBReboot_4col.info")
(newname "WBReboot1.0c.info")
(dest "SYS:WBStartup")
)
)
;Introduction message
(message "Welcome to the WBReboot 1.10 Installation Utility\n (c) 2000 Andrew Dixon. ")
(if
(= 0
(askchoice
(prompt "Please choose which version to install")
(choices "Tools Menu Version" "Commodity Version")
(help "The installer is asking which version of WBReboot you would like to install.")